﻿Partial Public Class ApplicationMainWindow

    Public Sub New()

        Dim obj As New LabContactViewModel
        obj.LabContact = New LabContact With _
            {.Birthday = #12/25/1960#, _
             .FirstName = "John", _
             .LastName = "Smith", _
             .NumberOfComputers = 3}

        Me.DataContext = obj

        ' This call is required by the Windows Form Designer.
        InitializeComponent()

        ' Add any initialization after the InitializeComponent() call.

    End Sub
End Class
